Шаг 103 - Создаем свой компонент источник данных.

Нам нужно повторить все что сделано в шаге Шаг 97 - Свой OCX элемент источник данных. Поместим на нашу форму элемент управления ADO. Настроим его базу данных и таблицу. Об этом было написано в шагах Шаг 34 - Используем ADO и далее. Имя проекту дадим MyAdoControl. Не забудьте SQL запрос написать и поставить бинарную совместимость. Нам нужно написать реализацию функции GetDataMember. К этой функции производиться обращение для получения набора данных.

Private Sub UserControl_GetDataMember(DataMember As String, Data As Object)
Set Data = Adodc1
End Sub

Дальше нужно собрать элемент и в проекте поместить его на форму. Заполнить свойства. Они должны автоматически заполняться, если все правильно, и Вы не где не ошиблись.

103_1.gif (2064 b)

После запуска Вы увидите первую запись.

103_2.gif (2086 b)

Что в данной технологии хорошо? Мы логику выделяем в отдельный компонент . А логика может быть довольно сложная. Например, как в шаге Шаг 92 - Просмотр и редактирование связанных данных и сложнее.

Hosted by uCoz